home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Transactor
/
Transactor_19_1987_Transactor_Publishing.d64
/
copy file64
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2023-02-26
|
273b
|
7 lines
80 poke51,84:poke52,9
90 input"file type s[157][157][157]";t$:input"file";x$
100 open1,8,2,x$:sys2223
105 ifst<>64thenprint"no go":stop
120 close1:input"other disk ready";a$
130 iflen(a$)thenopen 1,8,2,x$+","+t$+",w":sys2267:close1